home *** CD-ROM | disk | FTP | other *** search
/ Language/OS - Multiplatform Resource Library / LANGUAGE OS.iso / python / maclibnx.lha / time.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-08-14  |  254 b   |  19 lines

  1. /* Time emulator.
  2.    Public domain by Guido van Rossum, CWI, Amsterdam (July 1987). */
  3.  
  4. #include "macdefs.h"
  5. #include <OSUtils.h>
  6.  
  7. long
  8. time(p)
  9.     long *p;
  10. {
  11.     long secs;
  12.     
  13.     GetDateTime(&secs);
  14.     secs -= TIMEDIFF;
  15.     if (p != NULL)
  16.         *p= secs;
  17.     return secs;
  18. }
  19.